home *** CD-ROM | disk | FTP | other *** search
/ AV Traveler / AV Traveler.iso / TravMac / TRAV2.DXR / 00016.ls < prev    next >
Encoding:
Text File  |  1995-11-17  |  502 b   |  27 lines
  1. on exitFrame
  2.   global ballpos
  3.   if (ballpos = 1) or (ballpos = 5) then
  4.     puppetSound("fail")
  5.     updateStage()
  6.     wait(1)
  7.     puppetSound(0)
  8.     go("RGO")
  9.   else
  10.     if (ballpos = 3) or (ballpos = 7) then
  11.       puppetSound("fail")
  12.       updateStage()
  13.       wait(1)
  14.       puppetSound(0)
  15.       puppetSprite(5, 0)
  16.       go("Quit")
  17.     else
  18.       puppetSound("success")
  19.       updateStage()
  20.       wait(2)
  21.       puppetSound(0)
  22.       puppetSprite(5, 0)
  23.       go("MM0", "TRAV3.DIR")
  24.     end if
  25.   end if
  26. end
  27.